function tempscript(program, version)
path1 = 'data/';
path2 = '/v';
path3 = '.mat';
path = [path1,program,path2,version,path3];
load(path);
%   Find all fail test cases
FailCover = Coverage(Result==1,:);
    
%   Find all pass test cases
PassCover = Coverage(Result==0,:);
a1 = 0;
b1 = 0;
c1 = 0;
d1 = 0;
a2 = 0;
b2 = 0;
c2 = 0;
d2 = 0;
a3 = 0;
b3 = 0;
c3 = 0;
d3 = 0;

n = 10;
for i = 1:n
    mf = GA( PassCover, FailCover );
%      ss=tarAdv( PassCover, FailCover, mf )
%     for j = 1:size(mf,1)
%         mf(j,:) = mf(j,:) * (1 - tarAdv( PassCover, FailCover, mf(j,:) ));
%     end
% %     size(mf)
%      sum(mf)
%     top = tarAdv( PassCover, FailCover, mf(1,:) )
%     ii = zeros(1,size(FailCover,2));
%     for m = 1:NumOfFault
%         ii(LOES==LOFS(m)) = 1;
%     end
%     best = tarAdv( PassCover, FailCover, ii )
    
%     pp = eye(size(PassCover,2));
%     tarAdv( PassCover, FailCover, pp )

    mffirst = zeros(1,size(mf,2));
    for j = 1:size(mffirst,2)
        findtemp = find(mf(:,j)==1);
        if ~isempty(findtemp)
            mffirst(1,j) = findtemp(1);
        else
            mffirst(1,j) = size(mf,1);
        end
    end

    [ Avg, First, Last ] = evaluate( size(mf,1) - mffirst, LOES, LOFS, NumOfEntities );
    a1 = a1 + First;
    a2 = a2 + Last;
    a3 = a3 + Avg;

    [ Avg, First, Last ] = evaluate( tarantula( PassCover, FailCover ), LOES, LOFS, NumOfEntities );
    b1 = b1 + First;
    b2 = b2 + Last;
    b3 = b3 + Avg;
    
    [ Avg, First, Last ] = evaluate( tarAdvOrigin( PassCover, FailCover ), LOES, LOFS, NumOfEntities );
    c1 = c1 + First;
    c2 = c2 + Last;
    c3 = c3 + Avg;
    
    [ Avg, First, Last ] = evaluate( ochiai( PassCover, FailCover ), LOES, LOFS, NumOfEntities );
    d1 = d1 + First;
    d2 = d2 + Last;
    d3 = d3 + Avg;
end

mof = a1 / n;
mol = a2 / n;
moa = a3 / n;

tf = b1 / n;
tl = b2 / n;
ta = b3 / n;

taf = c1 / n;
tal = c2 / n;
taa = c3 / n;

of = d1 / n;
ol = d2 / n;
oa = d3 / n;

save (['result/', Version], 'mof', 'mol', 'moa', 'tf', 'tl', 'ta', 'taf', 'tal', 'taa', 'of', 'ol', 'oa');

% e = eye(size(FailCover,2));
% ochiai( PassCover, FailCover, e )
end